********************************************************************************
********"Macroprudential Regulation, Quantitative Easing, and Bank Lending"*****
********************************************************************************

********************************************************************************
********************************************************************************
**********************************2019******************************************
********************************************************************************
********************************************************************************
clear *
**#Bookmark (input)
use $inputdirectory/INB_TP322019
merge m:1 bankid using $inputdirectory/INB_preann2019m8, keepus(e14)

gen itime=string(time,"%tm")
labmask time, values(itime)

**#Bookmark (output)
graph hbox tradingover if time>=tm(2019m9)&time<=tm(2019m12)&e14>0, over(time, gap(*2)) box(1,color(grey) lcolor(grey) lwidth(0.1))  medtype(marker) medmarker(symbol(dot) msize(small) mcolor(black)) nooutside ytitle("Trading of securities, % of assets", height(5)) title("") note("") graphregion(color(white) margin(zero)) saving($outputdirectory/FIG7A, replace)

********************************************************************************
********************************************************************************
**********************************2015******************************************
********************************************************************************
********************************************************************************
clear *
**#Bookmark (input)
use $inputdirectory/INB_TP322015
merge m:1 bankid using $inputdirectory/INB_preann2014m12, keepus(e13)

gen itime=string(time,"%tm")
labmask time, values(itime)

**#Bookmark (output)
graph hbox tradingover if time>=tm(2015m1)&time<=tm(2015m4)&e13>0, over(time, gap(*2)) box(1,color(grey) lcolor(grey) lwidth(0.1))  medtype(marker) medmarker(symbol(dot) msize(small) mcolor(black)) nooutside ytitle("Trading of securities, % of assets", height(5)) title("") note("") graphregion(color(white) margin(zero)) saving($outputdirectory/FIG7B, replace)
